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/* mark the end of the command line you built, so you can add ending 

delimiter */ 
sys_command ( i ] = NULL; 

/* add the ending quote for the users message so shell wont 

interepert special characters */ 
strcat (sys_comrnand, "V"); 
/* execute command you built */ 
system (sys_command) ; 

printf ("sending message: %s\n", sys__command) ; 



else { 

if (strlen (mesg) == 0 ) { 
return (0) ; 

} 

/* print error for invalid message length */ 

printf ("telemail error: invalid message length: %s\n", mesg) ; 
return (0) ; 



return (i) ; 



function: getline (hold-buffer, input-file-pointer) 
arguments: pointer to buffer where line read will be heald, 

file pointer to input file 
description: reads 1 line of text from the input line and stores the 

line read into the buffer passed, 
returns: -1 if EOF or number of characters read in 



getline (buff , fp) 
char *buff; 
FILE *fp; 
{ 

int ch, cnt; 

/* keep on reading characetrs from file so long as end of file not 

reached or char is the end of line */ 
for (cnt = 0; ( {ch = fgetc(fp)) != EOF) S& ch != ' \n' ; cnt++) { 
/* MOD BY OT 11/29/90 convert tab to space */ 
/* convert tabs to single space */ 
if (ch == 9) < 
ch = ' ' ; 

) 

/* MOD BY OT 11/29/90 dont allow control char */ 
/* only load in ascii characters */ 
if (isprint (ch) != 0) ( 
buff [cnt] = ch; 

} 

else { 

/* turn control characters to spaces */ 
buff [cnt] » ' '; 

) 

) 

/* mark the end of the buffer you built */ 
buff [cnt] = ' \0'; 



JO 



* function: send_mesg (message-pointer) 

arguments: pointer to text message (capcode, text ) to be sent 
description: takes passed message text makes sure the first 8 positions 
« are numeric (capcode) . it builds and executes the network 

* send command (net send. sh) to sedn the message passed. 

* returns: 0 if not sent otherwise the number of characters sent out 

I. ...........*.•*••** ..**......*...«.*****»*******•************** — ••••**/ 

int send_mesg (mesg) 
char *mesg; 

char sys_command[7 00] ; 
int i; 
int ch; 

char *mesg_ptr; 

I* left justify the message passed to remove leading spaces */ 
strl just (mesg, 512); 

/* trim off trailing blank spaces from the message */ 
strtrim (mesg) ; 

/* make sure you have a capcode at least */ 
if (strlen (mesg) > 8) { 

/* start to build the command to be executed to send message retreieved 

from the mail box */ 
strcpy (sys_command, "netsend.sh "); 

/* loop while still more characters in the message */ 
for(mesg_ptr = mesg, i - 11; *mesg_ptr != NULL ; i++, mesg_ptr++) { 

/* make sure the first 8 positions of the message are numeric */ 
if((i < 19) && (*mesg_ptr < ' 0' II *mesg_ptr > ' 9' ) ) { 

printf ("telemail error: invalid capcode: %s\n", mesg); 

return 0; 

} . •; 

/* is the user didsnt seperate capcode & message then ^insert a 

space into the command */ 
if(i — 19 && *mesg_ptr != ' ') < 

sys_command[19] = ' '; 

i = 20; 

} 

/* enclose the users message with ' so shell wont interpet 

special characters */ 
if(i =» 20) { 

sys command [ 2 0 ] = 'V'; 

i - 21; . - • - 

} 

/* put the character from the message onto to the 

command to be executed"*/ 
sys_command[i] = *mesg_ptr; 

} 



/* since your just starting clear the message area */ 
memset (mesg, NULL, MAXMSGLEN); 

f* keep on geting lines front the file until you reach end of file V 
while (getline (buff , fp) !«= -1) { 

/* every mail message start with the word "From " */ 
if (strncmp(buff , "From 5) -« 0) { 

/* set flag telling you are currently going thru mail header 
so you dont add it to the message */ ' 

in_header » 1; 

/* call routine to the last message if any exists */ 
send__mesg (mesg) ; 
continue ; 

} 

/* a mail header end with the following string */ 
if (strncmp (buff , "Content-Length:", 15) -« 0) { 

/* turn off flag so you know you are no longer in mail 
message header */ 

in_header = 0; 

/* clear the old message since this is a new one */ 

memset (mesg, NULL, MAXMSGLEN) ; 

continue; 

} 

/* if the line you are now reading in not part of the mail header 

add it to the message */ . ** 

if (in_header — 0) I , .'^c^- 

strl just (buff, 512); -7."; 
strtrim (buf f > ; . ' 

f* make sure you dont add more than the message length */ ** 
if{ (strlen(buff) + strlen (mesg) ) < MAXMSGLEN) { 

strcat(mesg, " "); . .. . 

strcat(mesg, buff); . ~ 

) — - — - 

) /* end of read line while */ 

/* send the last message in the file */ 
send_mesg (mesg) ; 



Program name: telemail.c network mail pickup 

Description: program searches the passed "mail" file and extracts 

the messages from it. a message is delimited by the words 
"message length" and "From " . these messages are then 
out on the telefind network, non ascii characters 
are skipped and invalid messages are displayed to the 
standard output . 
author: Oren Tavory 
site: telefind. corp 
date: 11/25/90 
modification history: 

11/29/90 MOD BY OT fix problem of tabs being sent to network 

by converting tabs to a space char 
11/29/90 MOD BY OT fix problem of control characters being 
passed if the message 



♦include <stdio.h> 
♦include <string.h> 
♦include <ctype.h> 

♦define MAXMSGLEN 512 
♦define MAXLINELEN 512 

void main targe, argv) 
int argc; 
char *argv[); 
I 

FILE *fp; 
char "buff; 
char *mesg; 
int in_header; 

/* make sure user passed filename to be converted */ 
if(argc != 2) { 

printf ("telemail ERROR: Usage: telemail mail-f ilename\n") ; 

exit (1) ; 

} 

/* open the mail file */ 

if((fp = fopen (argv II J, "r") ) == NULL) { 

printf ("telemail error: cant open mail file %s\n", argv[l)); 

exit (2) ; 

) 

/* allocate need buffer that will hold each line of the file */ 
if ((buff = (char *) malloc ( MAXLINELEN * sizeof (char ) ) ) == NULL) < 

printf ("telemail error: cant allocate memory for buffer\n"); 

exit (3) ; 

} 

/* allocate buffer for message to be stored */ 

ifUmesg = (char *) malloc ( MAXMSGLEN * sizeof (char) ) ) == NULL) { 
printf ("telemail error: cant allocate memory for message\n") ; 
exit (4) ; 

} 
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if (ch == EOF) { 
return (-1 ) ; 

} 

else { 

return (cnt) ; 

} 



